home *** CD-ROM | disk | FTP | other *** search
/ Whiteline: Alpha / Whiteline Alpha.iso / progtool / gfabasic / xpsave / demos / asc4.lst < prev    next >
Encoding:
File List  |  1994-09-22  |  175 b   |  14 lines
  1. a$="Dies "
  2. b$="ist "
  3. c$="ein "
  4. d$="Test: "
  5. e$="⇧⇩⇨⇦❎╱◆✓"
  6. PRINT a$;
  7. PRINT b$;
  8. PRINT c$;
  9. PRINT d$;
  10. FOR i%=1 TO LEN(e$)
  11.   OUT 5,ASC(MID$(e$,i%))
  12. NEXT i%
  13. VOID INP(2)
  14.